[NAGWare Gateway Generator] Copyright (c) 1993 by the Numerical Algorithms Group Ltd jacobf
x real epslon real y (n) real f (n,n) real n integer [f] = jacobf(x,epslon,y,n) function [f] = jacobf(x,epslon,y,n)